#!/usr/bin/perl

our $ip = shift;

system("wget --no-check-certificate https://$ip:8282/database -O - | ./parse_flags.pl | ./db_send.pl " );

sub p
{
    print "$team : " . shift;
}
